perm filename FNTHDR.SAI[VIS,HPM]1 blob
sn#268906 filedate 1977-03-10 generic text, type C, neo UTF8
COMMENT ā VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 REQUIRE "VIXHDR.SAI[VIS,HPM]" SOURCE_FILE
C00004 ENDMK
Cā;
REQUIRE "VIXHDR.SAI[VIS,HPM]" SOURCE_FILE;
REQUIRE "FNTSAI.REL[VIS,HPM]" LIBRARY;
REQUIRE "FNTFAI.REL[VIS,HPM]" LOAD_MODULE;
EXTERNAL INTEGER PROCEDURE FNTSEL(INTEGER FNTNUM; STRING FILSPEC;
REFERENCE INTEGER FNTHEAD);
EXTERNAL PROCEDURE FCACHE(REFERENCE INTEGER CHE; INTEGER BFSZ);
EXTERNAL PROCEDURE MARSET(INTEGER LMAR,YB(100),XB(100));
EXTERNAL PROCEDURE CHRDEP(INTEGER FNTNUM; STRING CHRS; REFERENCE INTEGER PIC,
YLO,XLO; INTEGER YCOMP(1),XCOMP(1));
EXTERNAL PROCEDURE CHR3X2(INTEGER FNTNUM; STRING CHRS; REFERENCE INTEGER PIC,
YLO,XLO);
EXTERNAL PROCEDURE CHRPED(INTEGER FNTNUM; STRING CHRS; REFERENCE INTEGER PIC,
YLO,XLO; INTEGER YCOMP(1),XCOMP(1));
EXTERNAL INTEGER L3X2;
DEFINE FNTHIG='201;
DEFINE FNTBAS='203;